home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / Borland Plateform / Turbo Prolog 2 / EXAMPL46.PRO < prev    next >
Encoding:
Prolog Source  |  1986-04-25  |  235 b   |  11 lines

  1.                /* Program 46 */
  2. domains
  3.     charlist=char*
  4. predicates
  5.     string_chlist(string,charlist)
  6. clauses
  7.     string_chlist("",[]).
  8.     string_chlist(S,[H|T]):-
  9.         frontchar(S,H,S1),
  10.         string_chlist(S1,T).
  11.